package Exemples

installing package

library(devtools)
install_github("AbbassiNarjes/DETmapTun")

simulating data by state in testG and by delegation in testD using the included datasets tnMAP and tnMAPDELE

library(DETmap)

testG <- cbind(tnMAP$NAME_1,rnorm(n = 24,mean = 20,sd = 13),tnMAP$HASC_1)

## Loading required package: sp

testG=as.data.frame(testG)
testG[,2]=as.numeric(testG[,2])

testD <- cbind(tnMAPDELE@data[["NAME_2"]],tnMAPDELE@data[["HASC_2"]],tnMAPDELE@data[["NAME_1"]],rnorm(268,50,20))
testD=as.data.frame(testD)
testD[,4]=as.numeric(testD[,4])

Exemples with DELE_function

changing color and boundries color

DELE_function(data = testD,var=4,mapColor = c("green","blue","red"), DELEcode =2,showVar1 = 1,showVar2 = 4,showVar3 = 3,addLeg = T,prov= providers$Esri.WorldImagery,GovBoundaryColor="gold")

Exemples with Gov_function

Gov_function(data = testG,var=2,mapColor =c("pink","gray","black"),addLeg = T ,GOVcode =  3,prov = providers$Esri.WorldImagery,showVar1 = 1,showVar2 = 2)

removing legend

Gov_function(data = testG,var=2,mapColor =c("pink","gray","black"),addLeg = F ,GOVcode =  3,prov = providers$Esri.WorldImagery,showVar1 = 1,showVar2 = 2)

Exemples with DELEDotDensityMap

changing color and number of dots

DELEDotDensityMap(testD,DELEcode = 2,prov = providers$Esri.WorldImagery,polyColor = "white",dotColor = "green", polyEdgColor= "gold" ,var=4,OneDFor = 1)

## Checking rgeos availability: TRUE

Exemples with GovDotDensityMap

changing color and number of dots

GovDotDensityMap(testG,Govcode = 3,prov = providers$Esri.WorldImagery,polyColor = "white",dotColor = "green", polyEdgColor= "gold" ,var=2,OneDFor = 0.01)